' ******************************************************************************
' swxJRNL.swj - journal recorded on 05/02/05 by Moi
' *****************************************************************************
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Fin de course.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
boolstatus = Part.Extension.SelectByID("Arc1", "SKETCHSEGMENT", 0.006735296743724, 0.01486163682791, 0.005999999999972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc2", "SKETCHSEGMENT", 0.007264247462173, 0.005484783182687, 0.005999999999972, True, 0, Nothing)
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgSAMELENGTH"
boolstatus = Part.Extension.SelectByID("D4@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.01279418679141, 0.007023548909082, 0.003, False, 0, Nothing)
Part.EditDelete
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

boolstatus = Part.Extension.SelectByID("Arc2", "SKETCHSEGMENT", 0.006735296743724, 0.004907746035289, 0.005999999999972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc1", "SKETCHSEGMENT", 0.006542951027925, 0.01418842682261, 0.005999999999972, True, 0, Nothing)
Part.SketchAddConstraints "sgSAMELENGTH"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D1@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.01240949535981, 0.01351521681731, 0.003, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D3@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.01515042180995, 0.01183219180407, 0.003, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D5@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.0159678911021, 0.005052005322138, 0.003, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.005196531017329, 0.01904515614655, 0.005999999999972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.008514494614869, -4.515614654684e-005, 0.005999999999972, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Arc1", "SKETCHSEGMENT", 0.007841284609571, 0.01337095753046, 0.005999999999972, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D2@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.01289035964931, 0.01615997040956, 0.003, False, 0, Nothing)
Part.Parameter("D2@Esquisse2").SystemValue = 0.003
boolstatus = Part.Extension.SelectByID("D2@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.01322696465196, 0.01683318041485, 0.003, False, 0, Nothing)
Part.Parameter("D2@Esquisse2").SystemValue = 0.002
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01010134677021, 0.001734041724598, 0.005999999999972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point8", "SKETCHPOINT", 0.0075, 0.0045, 0, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.00500419, -0.00283417, 0.006)
Part.ClearSelection2 True
Part.Parameter("D4@Esquisse2").SystemValue = 0.0025
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D4@Esquisse2@Fin de course.SLDPRT", "DIMENSION", 0.005052271730479, -0.002593736880889, 0.003, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Point2", "SKETCHPOINT", 0.0075, 0.0145, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point8", "SKETCHPOINT", 0.0075, 0.0045, 0, True, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Point2", "SKETCHPOINT", 0.0075, 0.0145, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point8", "SKETCHPOINT", 0.0075, 0.0045, 0, True, 0, Nothing)
Part.SketchAddConstraints "sgHORIZPOINTS"
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgVERTPOINTS"
Part.SetPickMode
Part.ClearSelection2 True
Part.EditUndo 1
Part.ClearSelection2 True
Part.EditUndo 1
Part.SketchAddConstraints "sgVERTPOINTS"
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.008033630325371, 0.005292437466887, 0.005999999999972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
Part.SelectionManager.EnableContourSelection = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
swApp.LoadFile2 "E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.AddComponent "E:\Maquette ascenseur\Pièces\Fin de course.SLDPRT", 0.3583433657002, 0.08192874602202, 0.0925896983027
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "VERTEX", 0.3510655442503, 0.07465666309103, 0.0918396983027, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0804554, -0.306344
Part.ActiveView().RotateAboutCenter 0.0100569, -0.350108
Part.ActiveView().RotateAboutCenter 0, -0.153172
Part.ActiveView().RotateAboutCenter 0, -0.229758
Part.ActiveView().RotateAboutCenter 0, -0.164113
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.12035
Part.ActiveView().RotateAboutCenter -0.0100569, -0.404812
Part.ActiveView().RotateAboutCenter -0.0201139, -0.13129
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0100569, -0.142231
Part.ActiveView().RotateAboutCenter 0, -0.164113
Part.ActiveView().RotateAboutCenter -0.0100569, -0.164113
Part.ActiveView().RotateAboutCenter -0.0201139, -0.164113
Part.ActiveView().RotateAboutCenter -0.0100569, -0.13129
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ViewZoomTo2 0.0457058, -0.0780204, 0.170566, 0.0721801, -0.123909, 0.170566
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.3592153802177, 0.08466462844729, 0.09404859746785, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.100569, 0.153172
Part.ActiveView().RotateAboutCenter 0.0301708, 0.415753
Part.ActiveView().RotateAboutCenter -0.0201139, 0.262581
Part.ActiveView().RotateAboutCenter -0.0100569, 0.13129
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0100569, 0.153172
Part.ActiveView().RotateAboutCenter 0, 0.175054
Part.ActiveView().RotateAboutCenter 0, 0.109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.164113
Part.ActiveView().RotateAboutCenter 0, 0.218817
Part.ActiveView().RotateAboutCenter 0, 0.0984678
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0.12035
Part.ActiveView().RotateAboutCenter -0.0100569, 0.142231
Part.ActiveView().RotateAboutCenter 0, 0.13129
Part.ActiveView().RotateAboutCenter 0, 0.196936
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ViewZoomTo2 -0.00592813, -0.266199, 0.170022, 0.060355, -0.331621, 0.170022
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04756903800576, 0.04499124490121, 0.2662567499479, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.340495275046, 0, 0, 1, 1, 0.1570251497531, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.925926
Part.ViewZoomTo2 -0.3127, -0.029168, 0.168391, -0.230338, -0.170133, 0.168391
Part.ViewZoomTo2 -0.284377, -0.0791955, 0.168391, -0.264038, -0.107716, 0.168391
boolstatus = Part.Extension.SelectByID("", "FACE", 0.3543980117967, 0.04319956120617, 0.08903762323727, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ViewZoomTo2 0.0135579, -0.272643, 0.168391, 0.0371636, -0.318169, 0.168391
boolstatus = Part.Extension.SelectByID("Platine de commande-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
Part.ViewZoomTo2 0.0128281, -0.283364, 0.168391, 0.0193964, -0.290763, 0.168391
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04483276076095, 0.0460280768533, 0.2609516940898, True, 1, Nothing)
Part.DeSelectByID "", "FACE", 0.04481521958326, 0.04591638661248, 0.2609846471475
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04484303623793, 0.04618818625687, 0.260931422203, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().TranslateBy 0, 0.000425915
Part.ActiveView().TranslateBy 0.0161848, 0
Part.ActiveView().TranslateBy 0.0225735, 0.00255549
Part.ActiveView().TranslateBy 0.0114997, 0.000851829
Part.ActiveView().TranslateBy 0.00681463, 0.00127774
Part.ActiveView().TranslateBy 0.00170366, 0
Part.ViewZoomTo2 -0.290787, -0.061035, 0.168391, -0.233459, -0.129323, 0.168391
Part.ViewZoomTo2 -0.277638, -0.0833447, 0.168391, -0.271749, -0.0905925, 0.168391
boolstatus = Part.Extension.SelectByID("", "FACE", 0.3543703075018, 0.04169338576918, 0.08910050852763, True, 1, Nothing)
Part.ViewZoomtofit2
Set Feature = Part.AddMate2 (1, 1, False, 0.3517975506814, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomTo2 0.00499428, -0.290047, 0.172736, 0.0248905, -0.313259, 0.172736
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04619949452754, 0.04026913009176, 0.2705135155367, True, 1, Nothing)
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ClearSelection2 True
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04907013575142, 0.0389912449013, 0.2696426540902, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04870811365546, 0.0429117899057, 0.2697314546204, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04477776059726, 0.04684700387287, 0.2710491021421, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.001922567525688, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.862069
Part.ActiveView().ZoomByFactor 0.854701
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.833333
Part.ActiveView().ZoomByFactor 0.862069
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0984678
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.746269
Part.ActiveView().ZoomByFactor 0.763359
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0502846, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0603416, -0.0547043
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0547043
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0984678
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.12035
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.12035
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0547043
Part.ActiveView().RotateAboutCenter -0.0502846, 0.0656452
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.120683, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0603416, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0437635
Part.ActiveView().RotateAboutCenter 0.120683, 0.0547043
Part.ActiveView().RotateAboutCenter 0.140797, 0.0328226
Part.ActiveView().RotateAboutCenter 0.150854, 0.0437635
Part.ActiveView().RotateAboutCenter 0.140797, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0502846, 0
Part.ActiveView().RotateAboutCenter 0.0502846, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ShowNamedView2 "*Face", 1
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.1027929754218, 0.03100000000001, 0.02761338992861, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0441648965101, 0.03899124490113, 0.2651713200642, False, 0, Nothing)
Part.ViewZoomTo2 -0.0601544, -0.243091, -0.094, -0.00837893, -0.309333, -0.094
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03250898135786, 0.0449912449011, 0.2557238542242, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03250898135786, 0.0449912449011, 0.2556139999703, False, 0, Nothing)
Part.OpenCompFile
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Support fin de course bas.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Support fin de course bas.SLDPRT", 1, 0, "", longstatus, longwarnings)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Esquisse3", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", -0.00289697864503, 0.01874064023412, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", -0.00289697864503, 0.01547602040203, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0197466, 0.0216893, 0.002)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

boolstatus = Part.Extension.SelectByID("D4@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", -0.002686358010702, 0.02874512036471, 0.001, False, 0, Nothing)
Part.EditDelete
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.09
Part.ActiveView().ZoomByFactor 1.07
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Arc6", "SKETCHSEGMENT", 0.009204673964981, 0.008212907303632, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", -0.003867305187377, 0.008212907303632, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line15", "SKETCHSEGMENT", -0.003353238591497, 0.005348821983734, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0107469, -0.00228874, 0.002)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

Part.SetPickMode
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("D1@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.02198290077684, 0.02033019134936, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("D2@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.03028140439603, 0.01511608730544, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", -0.01260643731732, 0.02679274284041, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01515315886016, 0.02018331517911, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.0083968550286, 0.0198895628386, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.020661, 0.0223865, 0.002)
Part.ClearSelection2 True
Part.Parameter("D1@Esquisse3").SystemValue = 0.0065
boolstatus = Part.Extension.SelectByID("D1@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.02110164375533, 0.02341459092463, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01111406417825, 0.0250302287974, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.01140781651875, 0.01731922985921, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0190454, 0.0209177, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D1@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.02110164375533, 0.02341459092463, 0.001, False, 0, Nothing)
Part.Parameter("D2@Esquisse3").SystemValue = 0.008
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.01199532119975, 0.01731922985921, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.01162813077413, 0.006891021771372, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0213954, 0.0107098, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D2@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D3@Esquisse3").SystemValue = 0.01
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.0083968550286, 0.01783329645509, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line5", "SKETCHSEGMENT", -0.008567342635416, 0.01775985836996, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0042345, 0.0264256, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D4@Esquisse3").SystemValue = 0.017
boolstatus = Part.Extension.SelectByID("Arc4", "SKETCHSEGMENT", 0.009131235879856, 0.0158504681567, 0.001, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.017136, 0.0132067, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D4@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
' MSGBOX
' L'esquisse peut maintenant trouver une solution valide.

boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.0007592941755365, 0.01871455347659, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", 0.0006124180052853, 0.01563015390132, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.00122353, 0.0221661, 0.002)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse peut maintenant trouver une solution valide.

boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.00538589353845, 0.01849423922122, 0.001, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Arc4", "SKETCHSEGMENT", 0.009792178645986, 0.01629109666745, 0, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.1
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.11
Part.ActiveView().ZoomByFactor 1.1
Part.ActiveView().ZoomByFactor 1.13
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
boolstatus = Part.Extension.SelectByID("D4@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", -0.005167607099898, 0.02737161825402, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("D1@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.02094731745458, 0.0286652368078, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("D2@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.01916859194313, 0.02098437664472, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0.02175582905069, 0.0108779816933, 0.001, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", 0.001057932190179, 0.01524394431231, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", -0.0003165375232149, 0.01863969301599, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Arc4", "SKETCHSEGMENT", 0.009385601630151, 0.01613330706804, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Arc2", "SKETCHSEGMENT", -0.009695272038135, 0.01580990242959, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "FACE", -0.001691007236608, 0.009180107341458, 0, False, 0, Nothing)
Part.EditDelete
' MSGBOX
' Les entités qui n'appartiennent pas à l'esquisse active ne peuvent pas être supprimées.

boolstatus = Part.Extension.SelectByID("Line15", "SKETCHSEGMENT", 0.001543039147847, 0.005622656318557, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.00113878334979, 0.008775851543401, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Arc5", "SKETCHSEGMENT", -0.009210165080466, 0.00578435863778, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Arc6", "SKETCHSEGMENT", 0.009870708587819, 0.006269465595449, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01173028525888, 0.0251077857849, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.01124517830121, 0.01694181866415, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0205431, 0.0208227, 0.002)
Part.ClearSelection2 True
Part.Parameter("D1@Esquisse3").SystemValue = 0.008
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01504518280295, 0.02138863244278, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.008577090034037, 0.0194482046121, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0105175, 0.0288269, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D1@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D2@Esquisse3").SystemValue = 0.0065
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.008334536555203, 0.01977160925055, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", -0.008320802324741, 0.01702266982376, 0.001, True, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.008496238874425, 0.01985246041016, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line5", "SKETCHSEGMENT", -0.008401653484353, 0.01831628837754, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.00217611, 0.0275333, 0.002)
Part.ClearSelection2 True
Part.Parameter("D3@Esquisse3").SystemValue = 0.017
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.01156858293966, 0.01702266982376, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.01092177366277, 0.007077977191562, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0215941, 0.00861415, 0.002)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Support fin de course bas.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D4@Esquisse3").SystemValue = 0.01
Part.ClearSelection2 True
Part.SketchRectangle 0.0085, 0.01863969301599, 0, -0.0085, 0.01467798619503, 0, 1
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Line22", "SKETCHSEGMENT", -0.001044197959717, 0.01888224649482, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", -0.0008016444808831, 0.01718437214298, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line24", "SKETCHSEGMENT", -0.00120590027894, 0.01492053967387, 0, True, 0, Nothing)
Part.SketchAddConstraints "sgSYMMETRIC"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line25", "SKETCHSEGMENT", -0.00823995116513, 0.01621415822765, 0.001, False, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0180229, 0.0124142, 0.002)
Part.ClearSelection2 True
Part.Parameter("D5@Esquisse3").SystemValue = 0.002
Part.ClearSelection2 True
Part.Create3PointArc 0.0085, 0.018, 0, 0.0085, 0.016, 0, 0.009870708587819, 0.01678011634493, 0
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne23", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, 0.008577090034037, 0.0166184140257
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne23", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, 0.008577090034037, 0.01742692562182
Part.SetPickMode
Part.Create3PointArc -0.0085, 0.018, 0, -0.0085, 0.016, 0, -0.009614420878523, 0.01702266982376, 0
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne25", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 0, -0.008644206963187, 0.01742692562182
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne25", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 0, -0.008563355803575, 0.01678011634493
Part.SetPickMode
Part.SketchRectangle 0.0085, 0.008209893426122, 0, -0.0085, 0.005299251680112, 0, 1
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line26", "SKETCHSEGMENT", 0.0008962298709559, 0.008533298064567, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.001057932190179, 0.006835423712728, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line28", "SKETCHSEGMENT", 0.0008153787113445, 0.004814144722444, 0, True, 0, Nothing)
Part.SketchAddConstraints "sgSYMMETRIC"
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line26", "SKETCHSEGMENT", -0.005976118696011, 0.008371595745344, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line28", "SKETCHSEGMENT", -0.005976118696011, 0.005703507478169, 0.001, True, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line22", "SKETCHSEGMENT", -0.003146328109613, 0.0179928837391, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line24", "SKETCHSEGMENT", -0.003146328109613, 0.01572905126998, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line26", "SKETCHSEGMENT", -0.00355058390767, 0.008614149224178, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line28", "SKETCHSEGMENT", -0.00355058390767, 0.005703507478169, 0, True, 0, Nothing)
Part.SketchAddConstraints "sgSAMELENGTH"
Part.SketchAddConstraints "sgSAMELENGTH"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line26", "SKETCHSEGMENT", -0.003793137386504, 0.007967339947287, 0.001, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line28", "SKETCHSEGMENT", -0.003954839705727, 0.005703507478169, 0.001, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0126868, 0.00182265, 0.002)
Part.ClearSelection2 True
Part.Parameter("D6@Esquisse3").SystemValue = 0.002
Part.SetPickMode
Part.ClearSelection2 True
Part.Create3PointArc 0.0085, 0.008, 0, 0.0085, 0.006, 0, 0.009709006268596, 0.00691627487234, 0
Part.SetPickMode
Part.ClearSelection2 True
Part.Create3PointArc -0.0085, 0.008, 0, -0.0085, 0.006, 0, -0.009291016240078, 0.006997126031951, 0
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne29", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, -0.008320802324741, 0.006512019074283
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne29", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, -0.008563355803575, 0.007401381830008
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne27", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, 0.008496238874425, 0.006673721393505
' MSGBOX
' Le segment esquisse, en train d'être ajusté, a un point milieu ou une relation de longueur égale. Ajuster le segment supprimera la relation. Voulez-vous continuer ?

Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Ligne27", "SKETCHSEGMENT", 0.0, 0.0, 0.0, False, 0, Nothing)
Part.SketchTrim 1, 1, 0.008496238874425, 0.007401381830008
Part.SetPickMode
Part.EditRebuild
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04574357088601, 0.03899124490113, 0.2718878091509, False, 0, Nothing)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04168661260075, 0.03899124490113, 0.2717810470908, False, 0, Nothing)
Part.TranslateComponent
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0227888
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0227888
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0341831
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0341831
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0341831
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0341831
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0683663
Part.ActiveView().RotateAboutCenter 0, -0.0455775
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.0195477, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.0195477, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.0293215, 0
Part.ActiveView().RotateAboutCenter 0.0195477, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.0195477, 0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, 0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, 0.0227888
Part.ActiveView().RotateAboutCenter 0.0195477, 0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.0195477, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.0195477, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.0195477, 0
Part.ActiveView().RotateAboutCenter 0.0195477, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0.00977384, 0
Part.ActiveView().RotateAboutCenter 0.00977384, 0.0227888
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter -0.00977384, 0
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter -0.00977384, 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 0
boolstatus = Part.Extension.SelectByID("Fin de course-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coaxiale58", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coaxiale58", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Coaxiale59", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
Part.ActiveView().RotateAboutCenter 0, -0.0113944
Part.ActiveView().RotateAboutCenter 0, -0.0227888
Part.ActiveView().RotateAboutCenter 0, -0.091155
Part.ActiveView().RotateAboutCenter 0, -0.0569719
Part.ActiveView().RotateAboutCenter 0, -0.0569719
Part.ActiveView().RotateAboutCenter 0, -0.0341831
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ActiveView().RotateAboutCenter 0, 0.0113944
Part.ViewZoomTo2 -0.0538575, -0.260998, -0.094, -0.0503343, -0.26687, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03903138786032, 0.04149760879807, 0.2604800338424, False, 0, Nothing)
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.854701
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().ZoomByFactor 1.08
Part.ActiveView().ZoomByFactor 1.01
Part.ViewZoomTo2 -0.0492911, -0.259709, -0.094, -0.0464508, -0.266668, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03393832571226, 0.04582164513164, 0.2612634, True, 1, Nothing)
Set Feature = Part.AddMate2 (4, 1, False, 0.0009999999999998, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.980392
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03891426193866, 0.04181454302346, 0.2707751624332, False, 0, Nothing)
Part.ViewZoomTo2 -0.0474787, -0.271608, -0.094, -0.046513, -0.275531, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03387846273409, 0.04611580175731, 0.2712634, True, 1, Nothing)
Set Feature = Part.AddMate2 (4, 1, False, 0.0009999999999999, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.666667
Part.ActiveView().ZoomByFactor 0.735294
Part.ActiveView().ZoomByFactor 0.775194
Part.ActiveView().ZoomByFactor 0.806452
Part.ActiveView().ZoomByFactor 0.8
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.09
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03908555607856, 0.03899124490118, 0.2672925203683, False, 0, Nothing)
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0374913126746, 0.03899124490124, 0.257238830098, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 18
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 21
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 25
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 29
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 33
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 37
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 43
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 48
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 54
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 58
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 62
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 65
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 68
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 70
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 71
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 72
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 74
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 75
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 74
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 71
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 69
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 68
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 63
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 55
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 54
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 53
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 44
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 22
swApp.ActiveDoc.ActiveView.FrameLeft = -6
swApp.ActiveDoc.ActiveView.FrameTop = 2
swApp.ActiveDoc.ActiveView.FrameLeft = -9
swApp.ActiveDoc.ActiveView.FrameTop = -2
swApp.ActiveDoc.ActiveView.FrameLeft = -12
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -13
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -14
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -15
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -17
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -18
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -19
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -20
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -21
swApp.ActiveDoc.ActiveView.FrameTop = -4
swApp.ActiveDoc.ActiveView.FrameLeft = -21
swApp.ActiveDoc.ActiveView.FrameTop = -3
swApp.ActiveDoc.ActiveView.FrameLeft = -22
swApp.ActiveDoc.ActiveView.FrameTop = -3
swApp.ActiveDoc.ActiveView.FrameLeft = -22
swApp.ActiveDoc.ActiveView.FrameTop = -2
swApp.ActiveDoc.ActiveView.FrameLeft = -23
swApp.ActiveDoc.ActiveView.FrameTop = -2
swApp.ActiveDoc.ActiveView.FrameLeft = -24
swApp.ActiveDoc.ActiveView.FrameTop = -2
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = -1
swApp.ActiveDoc.ActiveView.FrameLeft = -26
swApp.ActiveDoc.ActiveView.FrameTop = -1
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.142231
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.109409
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.13129
Part.ActiveView().RotateAboutCenter 0.0100569, -0.13129
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.25164
Part.ActiveView().RotateAboutCenter 0, -0.196936
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ViewZoomTo2 -0.214775, -0.23827, -0.094, -0.153998, -0.310242, -0.094
Part.ViewZoomTo2 -0.184983, -0.253786, -0.094, -0.163022, -0.279448, -0.094
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().TranslateBy -0.000425915, 0
Part.ActiveView().TranslateBy -0.0110738, 0.00212957
Part.ActiveView().TranslateBy -0.0276845, 0.000851829
Part.ActiveView().TranslateBy -0.0259808, 0
Part.ActiveView().TranslateBy -0.025129, 0.000851829
Part.ActiveView().TranslateBy -0.0170366, 0
Part.ActiveView().TranslateBy -0.00979604, 0
Part.ActiveView().TranslateBy -0.0119256, -0.000425915
Part.ActiveView().TranslateBy -0.0114997, -0.00255549
Part.ActiveView().TranslateBy -0.00468506, -0.00127774
Part.ActiveView().TranslateBy -0.00553689, -0.00127774
Part.ActiveView().TranslateBy -0.00468506, -0.000425915
Part.ActiveView().TranslateBy -0.00255549, 0
Part.ActiveView().TranslateBy -0.00127774, 0
Part.ActiveView().TranslateBy -0.00170366, 0
Part.ActiveView().TranslateBy -0.0059628, 0
Part.ActiveView().TranslateBy -0.00511098, 0
Part.ActiveView().TranslateBy -0.000851829, 0
Part.ActiveView().TranslateBy -0.000425915, 0
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03555513493308, 0.04317856525284, 0.262132848032, False, 0, Nothing)
Part.TranslateComponent
Part.EditRebuild
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Fin de course-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Fin de course-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tangent3", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tangent3", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0435, 0.04499124490111, 0.2712634, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03805513493294, 0.04499124490111, 0.2702634, True, 1, Nothing)
Part.EditMate2 4, 1, False, 0.0009999999999999, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03550618678042, 0.0390835793192, 0.2646992898161, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.12035
Part.ActiveView().RotateAboutCenter 0.0100569, 0.164113
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.840336
Part.ActiveView().ZoomByFactor 0.813008
Part.ActiveView().ZoomByFactor 0.813008
Part.ActiveView().ZoomByFactor 0.787402
Part.ActiveView().ZoomByFactor 0.735294
Part.ActiveView().ZoomByFactor 0.78125
Part.ActiveView().ZoomByFactor 0.854701
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().ZoomByFactor 1.11
Part.ActiveView().ZoomByFactor 1.07
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ViewZoomTo2 -0.0553486, -0.251836, -0.094, -0.0214167, -0.291649, -0.094
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04311850446896, 0.03899124490118, 0.2666047362314, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Tangent3", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Tangent2", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04190994369153, 0.03899124490118, 0.2635805927266, False, 0, Nothing)
Part.ClearSelection2 True
Part.ViewZoomTo2 -0.0416179, -0.260882, -0.094, -0.036534, -0.267946, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03679061692292, 0.04290472656498, 0.2626471954716, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03328005922432, 0.04660275696045, 0.2612634, True, 1, Nothing)
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.854701
Part.ActiveView().ZoomByFactor 0.862069
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.8
Part.ActiveView().ZoomByFactor 0.793651
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0328226, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.087527, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0328226, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0218817, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0328226, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0328226, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0218817, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0437635, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0437635, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0218817, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0328226, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ActiveView().RotateAboutAxis -0.0109409, 0.2, 0.07, 0.29, 0, 0, -1
Part.ViewZoomTo2 -0.278584, -0.247017, -0.094, -0.251073, -0.29152, -0.094
Part.ViewZoomTo2 -0.274054, -0.258678, -0.094, -0.262836, -0.282369, -0.094
Part.DeSelectByID "", "FACE", 0.03328005922432, 0.04660275696045, 0.2612634
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04446213812474, 0.04600352712151, 0.2605359623394, True, 1, Nothing)
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.DeSelectByID "", "FACE", 0.04446213812474, 0.04600352712151, 0.2605359623394
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04434727523767, 0.04596290308677, 0.2607945540943, True, 1, Nothing)
Part.DeSelectByID "", "FACE", 0.04434727523767, 0.04596290308677, 0.2607945540943
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0360421117756, 0.0459132100716, 0.2612634, True, 1, Nothing)
Part.DeSelectByID "", "FACE", 0.0360421117756, 0.0459132100716, 0.2612634
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04432099505829, 0.04580094960511, 0.2608343352981, True, 1, Nothing)
Set Feature = Part.AddMate2 (4, 0, False, 0.006336001683771, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04426041358016, 0.04474010954655, 0.2709128391328, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04441299962826, 0.04584396141635, 0.2706713603889, True, 1, Nothing)
Set Feature = Part.AddMate2 (4, 0, False, 0, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04100000000011, 0.04386382654269, 0.2609054029271, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Tangent5", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tangent5", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0435, 0.04499124490111, 0.2702634, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0435, 0.04499124490111, 0.2702634, True, 1, Nothing)
Part.EditMate2 1, 1, False, 0, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Tangent4", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tangent4", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0435, 0.04499124490111, 0.2602634, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0435, 0.04499124490111, 0.2602634, True, 1, Nothing)
Part.EditMate2 1, 1, False, 0, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.0410535479034, 0.04510724254516, 0.2603756921358, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Coïncidente100", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coaxiale62", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Coaxiale61", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.04095477667647, 0.04489328029953, 0.2603699656697, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0703985, 0.109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0690821
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0805958
Part.ActiveView().RotateAboutCenter 0.0176636, -0.103623
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0575685
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
boolstatus = Part.Extension.SelectByID("", "FACE", 0.009999999999991, 0.01231350231832, 0.003100111742583, False, 0, Nothing)
Part.ShowNamedView2 "*Arrière", 2
Part.ShowNamedView2 "*Face", 1
Part.ShowNamedView2 "*Droite", 4
Part.ClearSelection2 True
Part.SketchRectangle -0.00423424471592, 0.01471330230754, 0, -0.001360480899748, 0.01379222416133, 0, 1
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.01891341865426, 0.0013236377739, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.002927052026385, 0.01475014543339, 0.002281559045957, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0168502, -0.00287648)
Part.ClearSelection2 True
Part.Parameter("D1@Esquisse18").SystemValue = 0.0042867
Part.ClearSelection2 True
Part.SketchRectangle -0.00423424471592, 0.009886852821408, 0, -0.001360480899748, 0.008744715920109, 0, 1
Part.ClearSelection2 True
Part.SketchRectangle -0.00423424471592, 0.00443407019585, 0, -0.001360480899748, 0.003218247042854, 0, 1
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line7", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line8", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.009999999999991, 0.01187638161722, 0.0004025596276905, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line10", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line12", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
Part.SketchAddConstraints "sgSAMELENGTH"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.002927052026385, 0.01305536164437, 0.0013236377739, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.013129, -0.00125538)
Part.ClearSelection2 True
Part.Parameter("D2@Esquisse18").SystemValue = 0.001
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0.002927052026385, 0.01364485165794, 0.001913127787473, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0111027, -0.00298701)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D2@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
' MSGBOX
' L'esquisse peut maintenant trouver une solution valide.

boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.002927052026385, 0.01427118479736, 0.002502617801047, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0140501, 0.00832383)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.002927052026385, 0.01412381229397, 0.00220787279426, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0.002927052026385, 0.01371853790964, 0.001839441535777, True, 0, Nothing)
Part.ClearSelection2 True
Part.EditUndo 1
Part.EditUndo 1
Part.EditUndo 1
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.009999999999991, 0.01316589102191, 0.004197401590072, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.002927052026385, 0.01290798914097, 0.001360480899748, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.012908, -0.00188171)
Part.ClearSelection2 True
Part.Parameter("D2@Esquisse18").SystemValue = 0.001
Part.ClearSelection2 True
Part.EditUndo 1
Part.ClearSelection2 True
Part.EditUndo 1
Part.EditUndo 1
Part.ClearSelection2 True
Part.EditUndo 1
Part.EditUndo 1
Part.DeSelectByID "Line1", "SKETCHSEGMENT", -0.003239480318014, 0.01471330230754, 0
Part.ClearSelection2 True
Part.EditUndo 1
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line7", "SKETCHSEGMENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line8", "SKETCHSEGMENT", 0, 0, 0, False, 0, Nothing)
Part.SketchRectangle -0.003055264688773, 0.005060403335272, 0, -0.0007341477603258, 0.003697207678883, 0, 1
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.009999999999991, 0.01460277293, 0.002834205933682, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0.009999999999991, 0.01360800853209, 0.002797362807834, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.009999999999991, 0.0100342253248, 0.002576304052744, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.009999999999991, 0.008413127787473, 0.00242893154935, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0.009999999999991, 0.01463961605585, 0.002465774675199, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0.009999999999991, 0.01393959666473, 0.002576304052744, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.009999999999991, 0.009886852821408, 0.002576304052744, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line8", "SKETCHSEGMENT", 0.009999999999991, 0.008634186542564, 0.002539460926895, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line10", "SKETCHSEGMENT", 0.009999999999991, 0.005170932712818, 0.001913127787473, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line12", "SKETCHSEGMENT", 0.009999999999991, 0.003586678301338, 0.00176575528408, True, 0, Nothing)
Part.SketchAddConstraints "sgSAMELENGTH"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.009999999999991, 0.01427118479736, 0.004050029086678, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01430802792321, 0.001434167151445, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line7", "SKETCHSEGMENT", 0.009999999999991, 0.009260519681986, 0.004344774093465, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009149990304441, 0.001286794648051, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", 0.009999999999991, 0.004507756447547, 0.003202637192166, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.009999999999991, 0.004397227070002, 0.0003288733759938, True, 0, Nothing)
Part.SketchAddConstraints "sgSAMELENGTH"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0.002927052026385, 0.01430802792321, 0.00423424471592, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0140501, 0.00714485)
Part.ClearSelection2 True
Part.Parameter("D2@Esquisse18").SystemValue = 0.001
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line3", "SKETCHSEGMENT", 0.002927052026385, 0.01364485165794, 0.002318402171805, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line6", "SKETCHSEGMENT", 0.002927052026385, 0.009776323443863, 0.002244715920109, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0114711, -0.00490285)
Part.ClearSelection2 True
Part.Parameter("D3@Esquisse18").SystemValue = 0.00396859
boolstatus = Part.Extension.SelectByID("Line8", "SKETCHSEGMENT", 0.002927052026385, 0.008744715920109, 0.002171029668412, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line10", "SKETCHSEGMENT", 0.002927052026385, 0.004765658328486, 0.0004762458793872, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.00701309, -0.00339228)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D4@Esquisse18").SystemValue = 0.00404751
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.01685020360675, 3.412836920691e-005, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.002927052026385, 0.01438171417491, 0.001434167151445, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.019724, 0.000844677)
Part.ClearSelection2 True
Part.Parameter("D5@Esquisse18").SystemValue = 0.00136048
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", -0.004853190744598, 0.01482383168509, 0.002502617801047, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.0193187, 0.00707117)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D5@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D6@Esquisse18").SystemValue = 0.00287376
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 8.65813457437e-005, 0.003534225324801, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.0001234244715921, 0.002649990304441, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.00174452200892, 0.0001078146209036, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Esquisse2", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
Part.InsertSketch2 True
boolstatus = Part.Extension.SelectByID("Esquisse2", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Extrusion1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0805958
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0690821
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter 0, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ShowNamedView2 "*Face", 1
Part.ShowNamedView2 "*Droite", 4
Part.EditRebuild
Part.ViewZoomTo2 -0.0123436, 0.0194318, 0.005, 0.00492982, -0.00410899, 0.005
boolstatus = Part.Extension.SelectByID("Ligne3@Esquisse18", "EXTSKETCHSEGMENT", -0.001673284312155, 0.01371330230754, 0, False, 0, Nothing)
Part.InsertSketch2 True
boolstatus = Part.Extension.SelectByID("Ligne3@Esquisse18", "EXTSKETCHSEGMENT", -0.00228953633672, 0.01371330230754, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D5@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.02019761335165, 0.0007503256782524, False, 0, Nothing)
Part.Parameter("D5@Esquisse18").SystemValue = 0.0015
boolstatus = Part.Extension.SelectByID("D6@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.01955747063496, 0.007118061123269, False, 0, Nothing)
Part.Parameter("D6@Esquisse18").SystemValue = 0.007
Part.ClearSelection2 True
Part.InsertSketch2 True
boolstatus = Part.Extension.SelectByID("Extrusion1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Ligne3@Esquisse18", "EXTSKETCHSEGMENT", -0.003176129657307, 0.01371330230754, 0, False, 0, Nothing)
Part.InsertSketch2 True
boolstatus = Part.Extension.SelectByID("D6@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.01967488372813, 0.01499540419786, False, 0, Nothing)
Part.Parameter("D6@Esquisse18").SystemValue = 0.003
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01421015552674, 0.001362345421763, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009205614963363, 0.001534915786017, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point12", "SKETCHPOINT", -0.0003210199728524, 0.003697207678883, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.009999999999991, 0.004316121309488, 0.0005570170552418, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009205614963363, 0.001707486150271, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01432520243625, 0.001362345421763, True, 0, Nothing)
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgHORIZONTAL"
Part.SketchAddConstraints "sgVERTICAL"
Part.SketchAddConstraints "sgVERTICAL"
' MSGBOX
' Une solution ne peut pas être déterminée pour cette esquisse. Considérez: 
'      o Déplacer l'esquisse plus près de la solution désirée en faisant glisser ou en changeant les valeurs de cote.
'      o Ajouter plus de cotes ou des relations pour définir l'esquisse plus précisément.
'      o Changer le système de cotation.

Part.SketchAddConstraints "sgCOLINEAR"
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgPARALLEL"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01432520243625, 0.001592439240768, False, 0, Nothing)
Part.SketchConstraintsDel 4, "sgCOLINEAR"
Part.SketchConstraintsDel 4, "sgPARALLEL"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01415263207199, 0.00164996269552, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01421015552674, 0.001534915786017, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009320661872866, 0.001765009605023, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.009999999999991, 0.004201074399985, 0.0003269232362359, False, 0, Nothing)
Part.SketchConstraintsDel 3, "sgCOLINEAR"
Part.SketchConstraintsDel 3, "sgPARALLEL"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009263138418115, 0.001765009605023, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.009999999999991, 0.004143550945233, 0.0003844466909874, False, 0, Nothing)
' MSGBOX
' Une solution ne peut pas être déterminée pour cette esquisse. Considérez: 
'      o Déplacer l'esquisse plus près de la solution désirée en faisant glisser ou en changeant les valeurs de cote.
'      o Ajouter plus de cotes ou des relations pour définir l'esquisse plus précisément.
'      o Changer le système de cotation.

Part.SketchConstraintsDel 0, "sgVERTICAL"
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchConstraintsDel 0, "sgHORIZONTAL"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Point10", "SKETCHPOINT", -0.001626236183828, 0.009744715920109, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009263138418115, 0.001707486150271, False, 0, Nothing)
Part.SketchConstraintsDel 1, "sgHORIZONTAL"
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01432520243625, 0.001477392331266, False, 0, Nothing)
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

Part.SketchConstraintsDel 1, "sgHORIZONTAL"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.009999999999991, 0.009263138418115, 0.001765009605023, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.009999999999991, 0.004258597854736, 0.0002118763267329, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line4", "SKETCHSEGMENT", 0.009999999999991, 0.01409510861724, 0.001477392331266, False, 0, Nothing)
Part.SketchAddConstraints "sgVERTICAL"
Part.ClearSelection2 True
Part.EditUndo 1
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.009320661872866, 9.682941722998e-005, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0.005, 0.009320661872866, 0.00164996269552, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.00707725, -0.00720865)
Part.ClearSelection2 True
Part.Parameter("D7@Esquisse18").SystemValue = 0.0015
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.009999999999991, 0.001957659664677, 9.682941722998e-005, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.005, 0.004201074399985, 0.0004419701457389, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.01, 0.00178509, -0.00260677)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D7@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0, 0, 0, False, 0, Nothing)
Part.Parameter("D8@Esquisse18").SystemValue = 0.0015
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D1@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.01720137517382, -0.002434202591835, False, 0, Nothing)
Part.Parameter("D1@Esquisse18").SystemValue = 0.004
boolstatus = Part.Extension.SelectByID("D3@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.01196674079143, -0.003872288960622, False, 0, Nothing)
Part.Parameter("D3@Esquisse18").SystemValue = 0.004
boolstatus = Part.Extension.SelectByID("D4@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005, 0.007077247137559, -0.002491726046587, False, 0, Nothing)
Part.Parameter("D4@Esquisse18").SystemValue = 0.004
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0690821
Part.ActiveView().RotateAboutCenter 0, 0.0690821
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0575685
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0690821
Part.ActiveView().RotateAboutCenter 0, 0.0690821
Part.ActiveView().RotateAboutCenter 0, 0.103623
Part.ActiveView().RotateAboutCenter 0, 0.0690821
Part.ActiveView().RotateAboutCenter 0, 0.0805958
Part.ActiveView().RotateAboutCenter 0, 0.0921095
Part.ActiveView().RotateAboutCenter 0, 0.115137
Part.ActiveView().RotateAboutCenter 0, 0.0575685
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.FeatureManager.FeatureExtrusion True, False, False, 0, 0, 0.002, 0.01, False, False, False, False, 0.01745329251994, 0.01745329251994, False, False, False, False, 1, 1, 1
Part.SelectionManager.EnableContourSelection = 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0618225, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0706543, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0618225, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0618225, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0575685
Part.ActiveView().RotateAboutCenter -0.0441589, -0.103623
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0529907, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0575685
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0460548
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0460548
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0575685
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0575685
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
boolstatus = Part.Extension.SelectByID("Extrusion2", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.1", "SOLIDBODY", 0, 0, 0, True, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0690821
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0805958
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0690821
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0575685
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0690821
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0690821
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0690821
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0529907, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Extrusion2", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D2@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.005853684362857, 0.0148948895409, 0.006500401614169, False, 0, Nothing)
Part.Parameter("D2@Esquisse18").SystemValue = 0.0005
boolstatus = Part.Extension.SelectByID("D1@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.006264683766333, 0.01760176354191, -0.00363068582783, False, 0, Nothing)
Part.Parameter("D1@Esquisse18").SystemValue = 0.0045
boolstatus = Part.Extension.SelectByID("D1@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.006201440460596, 0.01694719574353, -0.003391383586111, False, 0, Nothing)
Part.Parameter("D1@Esquisse18").SystemValue = 0.004
Part.ClearSelection2 True
Part.EditRebuild
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0805958
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0690821
Part.ActiveView().RotateAboutCenter 0.0529907, -0.0460548
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0575685
Part.ActiveView().RotateAboutCenter 0.0706543, -0.0460548
Part.ActiveView().RotateAboutCenter 0.0794861, -0.0460548
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0460548
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0529907, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ViewZoomTo2 -0.0076324, 0.0189271, 0.005, -0.000384447, 0.00983837, 0.005
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200238649648, 0.01471429545371, 0.004493473474326, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200826116627, 0.01463873376023, 0.001477407585753, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200134299501, 0.01480459254043, 0.004496327213246, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01199553853991, 0.01473917063091, 0.001512201080573, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200464768402, 0.01018318212491, 0.004487289639343, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200869622676, 0.01026564033316, 0.00147621779405, True, 0, Nothing)
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ViewZoomTo2 0.000183483, 0.0109198, 0.005, 0.00507838, 0.00576458, 0.005
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.0120013764892, 0.005726005168903, 0.004496235614738, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01199733734313, 0.005699696134677, 0.001507281762201, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200134299501, 0.01480459254043, 0.004496327213246, False, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01199553853991, 0.01473917063091, 0.001512201080573, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200464768402, 0.01018318212491, 0.004487289639343, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01200869622676, 0.01026564033316, 0.00147621779405, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.0120013764892, 0.005726005168903, 0.004496235614738, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01199733734313, 0.005699696134677, 0.001507281762201, True, 1, Nothing)
Part.FeatureFillet5 195, 0.0003, 0, 0, 0, 0, 0
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0690821
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0805958
Part.ActiveView().RotateAboutCenter 0.0706543, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0618225, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0805958
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0690821
Part.ActiveView().RotateAboutCenter 0.0618225, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0460548
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0618225, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0706543, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0618225, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0529907, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0618225, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0529907, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0529907, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
boolstatus = Part.Extension.SelectByID("Extrusion2", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D5@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.004319214741026, 0.01344976493123, -0.003423531529354, False, 0, Nothing)
Part.Parameter("D5@Esquisse18").SystemValue = 0.0015
boolstatus = Part.Extension.SelectByID("", "FACE", 0.00865756692383, 0.01900000000006, 0.002729418236868, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D5@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.004424085049306, 0.01330410142782, -0.003328547308805, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0805958
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0575685
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0529907, -0.0805958
Part.ActiveView().RotateAboutCenter -0.0529907, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0883179, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0441589, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0460548
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0921095
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0690821
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
boolstatus = Part.Extension.SelectByID("D6@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.009552459980113, 0.02054536656165, 0.007558967533905, False, 0, Nothing)
Part.Parameter("D6@Esquisse18").SystemValue = 0.002
boolstatus = Part.Extension.SelectByID("D5@Esquisse18@Fin de course.SLDPRT", "DIMENSION", 0.008729898276354, 0.0175801364578, -0.002026789399654, False, 0, Nothing)
Part.Parameter("D5@Esquisse18").SystemValue = 0.002
Part.ClearSelection2 True
Part.EditRebuild
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0264954, 0.103623
Part.ActiveView().RotateAboutCenter 0.0353271, 0.115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0.103623
Part.ActiveView().RotateAboutCenter 0.0441589, 0.103623
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0921095
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0805958
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0805958
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0690821
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0690821
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0690821
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0805958
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0805958
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0575685
Part.ActiveView().RotateAboutCenter -0.0353271, 0.103623
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0575685
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0805958
Part.ActiveView().RotateAboutCenter 0, -0.0575685
Part.ActiveView().RotateAboutCenter 0, -0.0690821
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0115137
Part.ActiveView().RotateAboutCenter 0.114813, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0706543, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0529907, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0529907, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0794861, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0794861, 0.0230274
Part.ActiveView().RotateAboutCenter -0.123645, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0706543, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0618225, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0529907, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006771420537319, 0.0138150387116, 0.003924115121549, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0575685
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0460548
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0460548
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0353271, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0690821
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0529907, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0706543, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0883179, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0618225, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0706543, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0618225, 0
Part.ActiveView().RotateAboutCenter 0.0618225, 0
Part.ActiveView().RotateAboutCenter 0.0618225, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0706543, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0529907, 0
Part.ActiveView().RotateAboutCenter -0.0794861, 0
Part.ActiveView().RotateAboutCenter -0.0971497, 0
Part.ActiveView().RotateAboutCenter -0.0971497, 0
Part.ActiveView().RotateAboutCenter -0.167804, 0
Part.ActiveView().RotateAboutCenter -0.141309, -0.0345411
Part.ActiveView().RotateAboutCenter -0.132477, -0.0115137
Part.ActiveView().RotateAboutCenter -0.141309, -0.0230274
Part.ActiveView().RotateAboutCenter -0.123645, -0.0115137
Part.ActiveView().RotateAboutCenter -0.0971497, 0
Part.ActiveView().RotateAboutCenter -0.0706543, 0
Part.ActiveView().RotateAboutCenter -0.0529907, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0353271, 0
Part.ActiveView().RotateAboutCenter -0.0529907, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0706543, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0794861, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
boolstatus = Part.Extension.SelectByID("", "FACE", 0.00650938613029, 0.01463669001898, 0.004984418377944, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006586529202878, 0.00409309570788, 0.005060798633679, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006771420537319, 0.0138150387116, 0.003924115121549, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.009999999999906, 0.00776696211247, 0.004850676829108, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0575685
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.CreatePlaneAtOffset3  0.0025, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Esquisse2", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0529907, -0.0460548
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
boolstatus = Part.Extension.SelectByID("", "FACE", -0.001324459561005, 0.02499999999992, 0.0009583412004304, True, 0, Nothing)
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0230274
Part.ActiveView().RotateAboutCenter -0.0353271, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0.0115137
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0441589, 0
Part.ActiveView().RotateAboutCenter -0.0264954, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.0176636, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.CreatePlaneAtOffset3  0.008, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan1", "PLANE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Esquisse3", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.EditRebuild
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0441589, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0575685
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0353271, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0345411
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
boolstatus = Part.Extension.SelectByID("", "FACE", 0.004496685501238, 0.02499999999986, 0.001200876039206, False, 0, Nothing)
Part.CreatePlaneAtOffset3  0.018, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.EditRebuild
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.EditRebuild
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.EditRebuild
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Plan2@Fin de course-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan1@Support fin de course bas-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (2, -1, False, 0, 0, 0, 1, 1, 1.570796326795, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Fin de course-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan2@Support fin de course bas-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (2, -1, False, 0, 0, 0, 1, 1, 1.570796326795, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03784040015086, 0.0449912449011, 0.260865204372, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Perpendiculaire2", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Perpendiculaire2", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Perpendiculaire2", "MATE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Perpendiculaire2", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Perpendiculaire3", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Perpendiculaire2", "MATE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0230274
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, -0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, -0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006500241619875, 0.01447801861022, 0.005374136008925, False, 0, Nothing)
Part.InsertAxis2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006613131843039, 0.004037977411592, 0.005256471378345, False, 0, Nothing)
Part.InsertAxis2 True
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
Part.EditUndo 1
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Axe1", "AXIS", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Axe2", "AXIS", 0, 0, 0, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "FACE", 0.006967438158597, 0.01900000000001, 0.00375507996506, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Extrusion1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Esquisse2", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("", "FACE", 0.007094694618246, 0.01900000000001, 0.00335475108966, False, 0, Nothing)
Part.CreatePlaneAtOffset3  0.0045, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan3", "PLANE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.004932824558693, 0.01900000000001, 0.002293474400631, False, 0, Nothing)
Part.CreatePlaneAtOffset3  0.0145, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan4", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.EditRebuild
Part.ClearSelection2 True
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Plan3@Fin de course-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan1@Support fin de course bas-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 0, False, 6.081208129743e-005, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan4@Fin de course-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan2@Support fin de course bas-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 0, False, 0, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03857269200728, 0.04499124490115, 0.2609052065379, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ClearSelection2 True
Part.EditRebuild
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.201139, 0.13129
Part.ActiveView().RotateAboutCenter 0.0804554, 0.273522
Part.ActiveView().RotateAboutCenter 0.160911, 0.536103
Part.ActiveView().RotateAboutCenter 0.0301708, 0.218817
Part.ActiveView().RotateAboutCenter 0.0301708, 0.142231
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0804554, 0.0547043
Part.ActiveView().RotateAboutCenter -0.0603416, 0.0547043
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ViewZoomTo2 -0.174636, -0.257827, -0.084412, -0.138751, -0.320028, -0.084412
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter 0.140797, 0.12035
Part.ActiveView().RotateAboutCenter 0.0804554, 0.087527
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04334624388519, 0.03899124490113, 0.2659698323078, False, 0, Nothing)
Part.ViewZoomTo2 -0.154321, -0.294859, -0.084412, -0.145759, -0.306721, -0.084412
Part.ShowNamedView2 "*Face", 1
Part.ViewZoomTo2 -0.0654842, -0.242329, -0.094, -0.0152316, -0.283445, -0.094
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0433454590752, 0.03899124490113, 0.2661428060883, False, 0, Nothing)
Part.ClearSelection2 True
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("", "FACE", 0.01990444146157, 0.01600114159214, 0.258175924285, False, 0, Nothing)
Part.HideComponent2
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.01883197660343, 0.0190588723014, 0.2673684802119, False, 0, Nothing)
Part.HideComponent2
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.01998104609429, 0.0449912449011, 0.2650703412302, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03691066992636, 0.03899124490113, 0.2661428060883, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0373703, 0.094, 0.247834)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("RD1@Annotations@Maquette monte-charge.moAssembly_c", "DIMENSION", 0.03675746066091, 0.094, 0.2469916479072, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("RD1@Annotations@Maquette monte-charge.moAssembly_c", "DIMENSION", 0.03790653015178, 0.094, 0.2469916479072, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("RD1@Annotations@Maquette monte-charge.moAssembly_c", "DIMENSION", 0.03691066992636, 0.094, 0.2469916479072, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.02005765072701, 0.0449912449011, 0.2660662014556, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03691066992636, 0.03899124490113, 0.2669088524155, True, 1, Nothing)
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0656452
Part.ActiveView().RotateAboutCenter 0.0402277, -0.0765861
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Set Feature = Part.AddMate2 (5, -1, True, 0.018, 0.018, 0.018, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.1307738226508, 0.03101193298011, 0.1695773895892, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0804554, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0502846, 0
Part.ActiveView().RotateAboutCenter 0.0804554, 0
Part.ActiveView().RotateAboutCenter 0.0703985, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0804554, 0
Part.ActiveView().RotateAboutCenter 0.150854, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.140797, 0
Part.ActiveView().RotateAboutCenter 0.0804554, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.221252, 0.0437635
Part.ActiveView().RotateAboutCenter -0.13074, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0703985, -0.0109409
Part.ActiveView().RotateAboutCenter -0.181025, -0.0109409
Part.ActiveView().RotateAboutCenter -0.181025, -0.0218817
Part.ActiveView().RotateAboutCenter -0.160911, -0.0109409
Part.ActiveView().RotateAboutCenter -0.13074, 0
Part.ActiveView().RotateAboutCenter -0.0905123, 0
Part.ActiveView().RotateAboutCenter -0.0603416, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.120683, 0
Part.ActiveView().RotateAboutCenter 0.0905123, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ViewZoomTo2 -0.0956278, 0.00721993, -0.094, 0.0363047, -0.0615449, -0.094
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Support fin de course bas.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Support fin de course haut.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Support fin de course haut.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.2", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("D6@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.0107509304509, 0.006494083470236, 0.01318633877472, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D6@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.0107509304509, 0.006494083470236, 0.01318633877472, False, 0, Nothing)
Part.Parameter("D6@Esquisse5").SystemValue = 0.002
boolstatus = Part.Extension.SelectByID("D7@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.004097962850949, 0.01100998401049, 0.01318633877472, False, 0, Nothing)
Part.Parameter("D7@Esquisse5").SystemValue = 0.002
boolstatus = Part.Extension.SelectByID("D1@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.0004240098690496, 0.003279374611073, 0.01318633877472, False, 0, Nothing)
Part.Parameter("D1@Esquisse5").SystemValue = 0.01
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.01748651091771, 0.01483701836663, 0.01318633877472, False, 0, Nothing)
Part.Parameter("D2@Esquisse5").SystemValue = 0.008
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
' MSGBOX
' Un des composants de cet assemblage est en état de reprise. L'assemblage est inaccessible pour le moment.

swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.AddComponent "E:\Maquette ascenseur\Pièces\Fin de course.SLDPRT", -0.003431769971079, 0.09247185294453, 0.01966158003256
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.006366506902864, 0.08297179742544, 0.02114052459216, False, 0, Nothing)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.06366067186459, 0.03099776098952, 0.02775676108867, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.0515082784713, 0.08640455473858, 0.01836656562449, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Support fin de course bas.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Support fin de course bas.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ShowNamedView2 "*Face", 1
Part.ShowNamedView2 "*Arrière", 2
Part.ShowNamedView2 "*Gauche", 3
Part.ShowNamedView2 "*Droite", 4
Part.ShowNamedView2 "*Dessus", 5
boolstatus = Part.Extension.SelectByID("Esquisse3", "SKETCH", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Esquisse3", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.01505606018721, 0.02213254626859, 0, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
Part.SetPickMode
Part.SetPickMode
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Tôlerie 1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
Part.InsertSketch2 True
boolstatus = Part.Extension.SelectByID("Tôlerie 1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.0177926736662, 0.01453085561814, 0.01318633877472, False, 0, Nothing)
Part.Parameter("D2@Esquisse5").SystemValue = 0.007
Part.EditRebuild
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
boolstatus = Part.Extension.SelectByID("D1@Esquisse1@Support fin de course haut.SLDPRT", "DIMENSION", 0.01007600342931, 0.03361008079279, 0.01514831953317, False, 0, Nothing)
Part.EditRebuild
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Enlèv. mat.-Extru.2", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.SetPickMode
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("Esquisse5", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D8@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D7@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D5@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D1@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D4@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D3@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D6@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line15", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc5", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc7", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc8", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc6", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line2", "SKETCHSEGMENT", 0, 0, 0, True, 0, Nothing)
Part.EditRebuild
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Esquisse5", "SKETCH", 0, 0, 0, False, 0, Nothing)
Part.EditSketch
Part.ClearSelection2 True
Part.ViewZoomTo2 -0.0197969, 0.00242051, 0.0131863, 0.0204754, -0.036926, 0.0131863
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.01720530777513, 0.01400002257609, 0.01376047458544, False, 0, Nothing)
Part.Parameter("D2@Esquisse5").SystemValue = 0.009
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.01499975939156, 0.0144881396626, 0.002000000000407, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", -0.004630963779254, 0.01421278257076, 0.001999999999953, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", -0.004836966341088, 0.01317806821484, 0.01370230315143, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.01499975939156, 0.01441930038964, 0.002000000000407, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0191885, 0.012423, 0.002)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

Part.SetPickMode
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.01768598041941, 0.01379453398578, 0.01374593172694, False, 0, Nothing)
Part.Parameter("D2@Esquisse5").SystemValue = 0.0095
boolstatus = Part.Extension.SelectByID("D2@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.0182353205843, 0.01386303018255, 0.01375077934644, False, 0, Nothing)
Part.Parameter("D2@Esquisse5").SystemValue = 0.01
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Line1", "SKETCHSEGMENT", -0.004974301382311, 0.01441099975672, 0.01378956030245, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.01506842691217, 0.01593376439498, 0.002000000000294, True, 0, Nothing)
Set Annotation = Part.AddDimension2(-0.0191885, 0.0140063, 0.002)
Part.ClearSelection2 True
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

boolstatus = Part.Extension.SelectByID("D5@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.007858337247984, 0.01269859483745, 0.01366836981492, False, 0, Nothing)
Part.Parameter("D5@Esquisse5").SystemValue = 0.017
Part.ClearSelection2 True
Part.EditUndo 1
boolstatus = Part.Extension.SelectByID("Line15", "SKETCHSEGMENT", 0.006081169436104, 0.01311135420325, 0.001999999999953, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.003746473735321, 0.01352438984107, 0.001999999999953, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line11", "SKETCHSEGMENT", -0.004150291134976, 0.01435046111671, 0.001999999999953, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line9", "SKETCHSEGMENT", -0.00600431419148, 0.01435046111671, 0.001999999999953, True, 0, Nothing)
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgSAMELENGTH"
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.001137107952093, 0.01310957201807, 0.01369745553193, False, 0, Nothing)
Part.EditDelete
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

boolstatus = Part.Extension.SelectByID("D5@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.007721002206762, 0.01228761765682, 0.01363928409791, False, 0, Nothing)
Part.Parameter("D5@Esquisse5").SystemValue = 0.012
boolstatus = Part.Extension.SelectByID("Arc8", "SKETCHSEGMENT", -0.005660976588424, 0.0195822458624, 0.001999999999953, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Arc5", "SKETCHSEGMENT", 0.004845154065101, 0.01923804949755, 0.001999999999953, True, 0, Nothing)
' MSGBOX
' L'esquisse est sur-contrainte. Envisagez de supprimer certaines cotations ou relations sur-contraintes.

Part.SketchAddConstraints "sgSAMELENGTH"
boolstatus = Part.Extension.SelectByID("D6@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.006767844642217, 0.004136570241088, 0.01306241737729, False, 0, Nothing)
Part.EditDelete
' MSGBOX
' L'esquisse n'est plus sur-contrainte.

boolstatus = Part.Extension.SelectByID("D4@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.001961118199428, 0.02180858900797, 0.01431310320855, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D4@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.002029785720039, 0.02180858900797, 0.01431310320855, False, 0, Nothing)
Part.Parameter("D4@Esquisse5").SystemValue = 0.003
Part.ClearSelection2 True
Part.EditUndo 1
boolstatus = Part.Extension.SelectByID("D4@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.001686448116983, 0.02256204717245, 0.01436642702307, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("D8@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.009369022701432, 0.02023317648224, 0.01420160796003, True, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Point19", "SKETCHPOINT", 0.004, 0.0185, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point15", "SKETCHPOINT", -0.006, 0.0185, 0, True, 0, Nothing)
' MSGBOX
' Une solution ne peut pas être déterminée pour cette esquisse. Considérez: 
'      o Déplacer l'esquisse plus près de la solution désirée en faisant glisser ou en changeant les valeurs de cote.
'      o Ajouter plus de cotes ou des relations pour définir l'esquisse plus précisément.
'      o Changer le système de cotation.

Part.SketchAddConstraints "sgHORIZPOINTS"
boolstatus = Part.Extension.SelectByID("D4@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", 0.002373123323095, 0.02194558140151, 0.01432279844756, False, 0, Nothing)
Part.EditDelete
' MSGBOX
' L'esquisse peut maintenant trouver une solution valide.

boolstatus = Part.Extension.SelectByID("D8@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.009712360304489, 0.02098663464672, 0.01425493177454, False, 0, Nothing)
Part.Parameter("D8@Esquisse5").SystemValue = 0.005
boolstatus = Part.Extension.SelectByID("D7@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.002708273202139, 0.01084919752463, 0.01353748408839, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Line15", "SKETCHSEGMENT", 0.005943834394882, 0.01009573936015, 0.01348416027388, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.0042271463796, 0.01002724316338, 0.01347931265438, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.00958321, 0.0106331, 0.002)
Part.ClearSelection2 True
Part.Parameter("D3@Esquisse5").SystemValue = 0.002
boolstatus = Part.Extension.SelectByID("D5@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.00710299452126, 0.01276709103422, 0.01367321743442, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("Line13", "SKETCHSEGMENT", 0.004089811338377, 0.01249310624713, 0.01365382695642, False, 0, Nothing)
Set Annotation = Part.AddDimension2(0.000381765, 0.0130425, 0.002)
Part.ClearSelection2 True
Part.Parameter("D4@Esquisse5").SystemValue = 0.012
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D8@Esquisse5@Support fin de course haut.SLDPRT", "DIMENSION", -0.009163020139599, 0.0217400928112, 0.01430825558905, False, 0, Nothing)
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.002991131008597, 0.02495194982247, 0.001996599388065, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Point19", "SKETCHPOINT", 0.004, 0.02, 0, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.00251046, 0.0218539, 0.002)
Part.ClearSelection2 True
Part.Parameter("D5@Esquisse5").SystemValue = 0.005
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0460548
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0690821
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0575685
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter 0, 0.0460548
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter -0.00883179, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
boolstatus = Part.Extension.SelectByID("", "FACE", 0.01499999999999, 0.008921710981326, 0.0004380532291748, False, 0, Nothing)
Part.ShowNamedView2 "*Face", 1
Part.ShowNamedView2 "*Gauche", 3
Part.ShowNamedView2 "*Dessus", 5
Part.CreatePlaneAtOffset3  0.01, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan1", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0575685
Part.ActiveView().RotateAboutCenter -0.0176636, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0345411
Part.ActiveView().RotateAboutCenter 0, 0.0345411
Part.ActiveView().RotateAboutCenter -0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0230274
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0149999999999, 0.01639947705862, 0.001261883195014, False, 0, Nothing)
Part.CreatePlaneAtOffset3  0.02, True, True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0984678
Part.ActiveView().RotateAboutCenter 0.0301708, -0.153172
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0201139, -0.109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0984678
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0656452
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.862069
Part.ActiveView().ZoomByFactor 0.833333
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0502846, -0.0656452
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0201139, -0.087527
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0603416, -0.175054
Part.ActiveView().RotateAboutCenter -0.0603416, -0.109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0100569, -0.087527
Part.ActiveView().RotateAboutCenter -0.0100569, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.70922
Part.ActiveView().ZoomByFactor 0.775194
Part.ActiveView().ZoomByFactor 0.775194
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0765861
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0656452
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0100569, -0.109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0656452
Part.ViewZoomTo2 -0.229714, 0.027457, -0.094, -0.170488, -0.0646723, -0.094
Part.SetPickMode
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03603575574181, 0.09514215878028, 0.02223892213659, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.110626, 0.185995
Part.ActiveView().RotateAboutCenter 0.110626, 0.207877
Part.ActiveView().RotateAboutCenter 0.191082, 0.229758
Part.ActiveView().RotateAboutCenter 0.170968, 0.153172
Part.ActiveView().RotateAboutCenter 0.0804554, 0.13129
Part.ActiveView().RotateAboutCenter 0.0804554, 0.164113
Part.ActiveView().RotateAboutCenter 0.0100569, 0.109409
Part.ActiveView().RotateAboutCenter 0, 0.12035
Part.ActiveView().RotateAboutCenter -0.0100569, 0.087527
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.13129
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0804554, 0.306344
Part.ActiveView().RotateAboutCenter 0.0502846, 0.240699
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ViewZoomTo2 -0.0218458, -0.0481206, -0.094, 0.0193466, -0.0938899, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03629983158284, 0.04362732245062, 0.01202601414582, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.04797989881575, 0, 0, 1, 1, 0.4025195496097, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ShowNamedView2 "*Face", 1
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
' MSGBOX
' E:\Maquette ascenseur\Pièces\Fin de course.SLDPRT est référencé par d'autres documents ouverts.  "Enregistrer sous" remplacera ces références avec le nouveau nom. Sélectionnez "Enregistrer copie sous" dans la boîte de dialogue "Enregistrer sous" si vous souhaitez garder les références existantes.

' MSGBOX
' E:\Maquette ascenseur\Pièces\Fin de course.SLDPRT est référencé par d'autres documents ouverts.  "Enregistrer sous" remplacera ces références avec le nouveau nom. Sélectionnez "Enregistrer copie sous" dans la boîte de dialogue "Enregistrer sous" si vous souhaitez garder les références existantes.

swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = -25
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
' MSGBOX
' Certains des modèles référencés dans ce document ont été modifiés. Ils doivent être enregistrés lorsque le document est enregistré.
' 		Enregistrer le document et les modèles référencés maintenant ?

Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Maquette monte-charge.SLDASM"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Support fin de course haut.SLDPRT")
Part.Save2 FALSE
Part.ClearSelection2 True
Set Part = Nothing
swApp.CloseDoc "Support fin de course haut.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Support fin de course bas.SLDPRT")
Part.EditRebuild
Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Support fin de course bas.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Fin de course.SLDPRT")
Part.SaveAs2 "E:\Maquette ascenseur\Pièces\Fin de course bas.SLDPRT", 0, FALSE, FALSE
Part.SaveAs2 "E:\Maquette ascenseur\Pièces\Fin de course haut.SLDPRT", 0, FALSE, FALSE
Set Part = Nothing
swApp.CloseDoc "Fin de course haut.SLDPRT"
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Fin de course haut.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0.0264954, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0345411
Part.ActiveView().RotateAboutCenter 0.0353271, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0460548
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0230274
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0176636, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0230274
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0115137
Part.ActiveView().RotateAboutCenter 0.0264954, 0.0345411
Part.ActiveView().RotateAboutCenter 0.00883179, 0.0115137
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.00883179, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0176636, 0
Part.ActiveView().RotateAboutCenter 0.0441589, 0
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Fin de course haut.SLDPRT", "DIMENSION", -0.007268271208188, 0.01674342315419, -0.002158641132826, False, 0, Nothing)
Part.Parameter("D3@Esquisse3").SystemValue = 0.02
Part.EditRebuild
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
swApp.LoadFile2 "E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
' MSGBOX
' Un ou plusieurs documents sont en train d'être fermés à la suite de cette opération. Si vous ne les enregistrez pas, vos modifications seront perdues.
' Cliquez sur "Oui" pour les fermer et les enregistrer.
' Cliquez sur "Non" pour les fermer sans enregistrer les modifications.

Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Maquette monte-charge.SLDASM"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
swApp.LoadFile2 "E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03274384217666, 0.03762732245053, 0.02228356457301, False, 0, Nothing)
Part.EditDelete
Part.AddComponent "E:\Maquette ascenseur\Pièces\Fin de course haut.SLDPRT", -0.03730529106845, 0.09399999999999, -0.005888369449482
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0703985, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0502846, -0.087527
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0765861
Part.ActiveView().RotateAboutCenter 0.0502846, -0.0547043
Part.ActiveView().RotateAboutCenter 0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.00540425, 0.0227211, -0.094, 0.0951764, -0.0508127, -0.094
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", -0.03287004793566, 0.08603265636128, -0.00792323100616, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0984678
Part.ActiveView().RotateAboutCenter 0, -0.109409
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ViewZoomTo2 -0.202949, 0.0112039, -0.094, -0.181196, -0.0198726, -0.094
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", -0.04228310124029, 0.09616907081346, -0.006805303624844, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0703985, 0.142231
Part.ActiveView().RotateAboutCenter 0.0402277, 0.339167
Part.ActiveView().RotateAboutCenter 0, 0.240699
Part.ActiveView().RotateAboutCenter -0.0502846, 0.142231
Part.ActiveView().RotateAboutCenter -0.0502846, 0.13129
Part.ActiveView().RotateAboutCenter -0.0804554, 0.185995
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, 0.087527
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0765861
Part.ViewZoomTo2 -0.0665079, -0.00683379, -0.0934523, 0.0105418, -0.0440601, -0.0934523
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0444923949587, 0.04362732245062, 0.009644189531146, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.07433712819945, 0, 0, 1, 1, 0.2523991968323, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", -0.03677966793578, 0.03762732245059, -0.007693867583399, False, 0, Nothing)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 3.22827, 0.0656452
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.04
Part.ActiveView().ZoomByFactor 1.09
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.06
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.877193
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.990099
Part.ShowNamedView2 "*Arrière", 2
Part.ShowNamedView2 "*Face", 1
Part.ViewZoomTo2 -0.0548245, 0.00664977, -0.094, 0.0213158, -0.0496941, -0.094
Part.ActiveView().TranslateBy 0, 0.000425915
Part.ActiveView().TranslateBy 0.00511098, 0.000425915
Part.ActiveView().TranslateBy 0.00809238, 0.000425915
Part.ActiveView().TranslateBy 0.00809238, 0
Part.ActiveView().TranslateBy 0.00553689, 0
Part.ActiveView().TranslateBy 0.00638872, 0
Part.ActiveView().TranslateBy 0.00937012, -0.000851829
Part.ActiveView().TranslateBy 0.0123515, -0.00127774
Part.ActiveView().TranslateBy 0.00894421, -0.000851829
Part.ActiveView().TranslateBy 0.00681463, -0.000851829
Part.ActiveView().TranslateBy 0.00724055, -0.00170366
Part.ActiveView().TranslateBy 0.00724055, 0
Part.ActiveView().TranslateBy 0.00468506, 0
Part.ActiveView().TranslateBy 0.00340732, 0.000425915
Part.ActiveView().TranslateBy 0.0029814, 0.000425915
Part.ActiveView().TranslateBy 0.00383323, 0
Part.ActiveView().TranslateBy 0.00383323, 0
Part.ActiveView().TranslateBy 0.00255549, 0.000425915
Part.ActiveView().TranslateBy 0, 0.000425915
boolstatus = Part.Extension.SelectByID("Plan4@Fin de course haut-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan2@Support fin de course haut-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 0, False, 0, 0, 0, 1, 1, 0.1121474905519, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan3@Fin de course haut-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan1@Support fin de course haut-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 0, False, 0, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03578945666558, 0.03762732245053, 0.01670535449917, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Fin de course haut.SLDPRT", "DIMENSION", -0.01003569409438, 0.01694330840227, -0.002240308007653, False, 0, Nothing)
Part.Parameter("D3@Esquisse3").SystemValue = 0.03
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03857507967374, 0.03762732245053, 0.01809816600325, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
' MSGBOX
' Un ou plusieurs documents sont en train d'être fermés à la suite de cette opération. Si vous ne les enregistrez pas, vos modifications seront perdues.
' Cliquez sur "Oui" pour les fermer et les enregistrer.
' Cliquez sur "Non" pour les fermer sans enregistrer les modifications.

swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
Part.EditRebuild
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
Part.ShowNamedView2 "*Face", 1
boolstatus = Part.Extension.SelectByID("Pli esquissé27", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0, 0, 0, True, 0, Nothing)
Part.ClearSelection2 True
Part.EditRebuild
Part.Save2 FALSE
boolstatus = Part.Extension.SelectByID("Tôle de base pliée1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.FeatEdit
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("D3@Esquisse3@Fin de course haut.SLDPRT", "DIMENSION", -0.01583390244694, 0.01567863806974, 0.003, False, 0, Nothing)
Part.Parameter("D3@Esquisse3").SystemValue = 0.025
Part.EditRebuild
Part.ClearSelection2 True
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.07153828527026, 0.03100000000001, 0.02738357603044, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03869114729908, 0.03762732245053, 0.01647321924849, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03416450991082, 0, 0.0002237517009147, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03567338904024, 0.03762732245053, 0.0129911904883, True, 0, Nothing)
Set Annotation = Part.AddDimension2(0.0565656, 0.094, 0.0119466)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.EditDelete
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.04097267470797, -1.31719843921e-008, -0.0001366789000122, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03637131150294, 0.03762733299908, 0.01319490994316, True, 1, Nothing)
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0402277, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0603416, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0905123, -0.0328226
Part.ActiveView().RotateAboutCenter 0.0402277, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0301708, 0
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Set Feature = Part.AddMate2 (5, -1, True, 0.0398, 0.0398, 0.0398, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.EditRebuild
Part.ShowNamedView2 "*Face", 1
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "VERTEX", 0.1335, 0.031, 0.02475464490111, False, 0, Nothing)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Part.ClearSelection2 True
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Fin de course haut.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Fin de course haut.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
Set Part = swApp.ActivateDoc ("VisCS17.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.EditRebuild
Part.EditRebuild
Part.ViewZoomtofit
' MSGBOX
' Désirez-vous insérer l'élément généré dans l'assemblage

' en cour ? (Maquette monte-charge.SLDASM)

Part.SaveAs2 "E:\Maquette ascenseur\Pièces\VisCS M2 10.SLDPRT", 0, FALSE, FALSE
boolstatus = Part.Extension.SelectByID("Enlèvement de matière-Balayage1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing)
Part.SelectedFeatureProperties 0, 0, 0, 0, 0, 0, 0, 1, 0, "Enlèvement de matière-Balayage1"
Part.ClearSelection2 True
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
Set Part = swApp.ActivateDoc ("EcrouH3.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.EditRebuild
Part.EditRebuild
Part.ViewZoomtofit
' MSGBOX
' Désirez-vous insérer l'élément généré dans l'assemblage

' en cour ? (Maquette monte-charge.SLDASM)

Part.SaveAs2 "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 0, FALSE, FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
' MSGBOX
' Un ou plusieurs documents sont en train d'être fermés à la suite de cette opération. Si vous ne les enregistrez pas, vos modifications seront perdues.
' Cliquez sur "Oui" pour les fermer et les enregistrer.
' Cliquez sur "Non" pour les fermer sans enregistrer les modifications.

' MSGBOX
' E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM n'a pas été reconstruit avec succès depuis le dernier changement de fonction ou un modèle référencé de l'extérieur a changé.
' 	Il est plus sûr de reconstruire avant d'enregistrer.
' 		Reconstruire maintenant ?

Part.Save2 FALSE
Set Part = Nothing
swApp.CloseDoc "Maquette monte-charge.SLDASM"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("VisCS M2 10.SLDPRT")
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Ecrou  H M3.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Ecrou  H M3.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Ecrou  H M3.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = Nothing
swApp.CloseDoc "Ecrou  H M3.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
Set Part = Nothing
swApp.CloseDoc "Ecrou H M2.SLDPRT"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("VisCS M2 10.SLDPRT")
Set Part = Nothing
swApp.CloseDoc "VisCS M2 10.SLDPRT"
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.EditRebuild
' MSGBOX
' Certains des modèles référencés dans ce document ont été modifiés. Ils doivent être enregistrés lorsque le document est enregistré.
' 		Enregistrer le document et les modèles référencés maintenant ?

Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
Set Part = Nothing
swApp.CloseDoc "Maquette monte-charge.SLDASM"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.LoadFile2 "E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Vis CS M2 10.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.LoadFile2 "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 1, 0, "", longstatus, longwarnings)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Vis CS M2 10.SLDPRT")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
Set Part = swApp.ActivateDoc ("Maquette monte-charge.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.AddComponent "E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", -0.02588423673501, 0.09399999999999, 0.04893269135104
Part.ViewZoomtofit2
boolstatus = Part.Extension.SelectByID("Vis CS M2 10-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Rondelle plate M3-4@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Ecrou H M3-5@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis CS M3 10-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Tasseau-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis à bois-2@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis à bois-5@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis à bois-6@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis à bois-10@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis à bois-9@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Rondelle plate M3-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Ecrou H M3-6@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Rondelle plate M3-5@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Vis CS M3 8-5@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Vis CS M3 8-6@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Ecrou H M3-5@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Ecrou H M3-6@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Cabine-1@Maquette monte-charge/Rondelle plate M3-6@Cabine", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Vis CS M3 10-2@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Rondelle plate M3-6@Bâti", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Ecrou H M3-6@Bâti", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Ecrou H M3-7@Bâti", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Rondelle plate M3-7@Bâti", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Fin de course haut-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Support fin de course haut-1@Maquette monte-charge", "COMPONENT", 0, 0, 0, True, 0, Nothing)
Part.ViewZoomTo2 -0.0812868, 0.0150252, -0.094, 0.0603343, -0.0870029, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03228074806098, 0.03762732245053, 0.01537173748402, False, 0, Nothing)
Part.SetPickMode
Part.ClearSelection2 True
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "VERTEX", -0.02423594628816, 0.09374999999999, 0.04325954983492, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.12035
Part.ActiveView().RotateAboutCenter 0, -0.12035
Part.ActiveView().RotateAboutCenter 0, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ViewZoomTo2 -0.0163052, -0.0419257, -0.094, -0.00961274, -0.0535835, -0.094
Part.ViewZoomTo2 -0.0148536, -0.0476289, -0.094, -0.013597, -0.0495429, -0.094
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", -0.02671386073899, 0.09304002903514, 0.04888905132014, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.185995
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0
Part.ViewZoomTo2 -0.0791323, -0.0108625, -0.094, -0.046392, -0.0321818, -0.094
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04099140014711, 0.04041971464022, 0.01560100821929, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 0, False, 0.08515976880001, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.150854, -0.492339
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0301708, -0.175054
Part.ActiveView().RotateAboutCenter -0.0301708, -0.262581
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0984678
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.12035
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0328226
Part.ViewZoomTo2 -0.185372, 0.0164761, -0.0980766, -0.147886, -0.0294252, -0.0980766
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0984678
Part.ActiveView().RotateAboutCenter 0, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, 0.13129
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.03865716922633, 0.08993890254447, 0.01647806948707, True, 1, Nothing)
Part.DeSelectByID "", "EDGE", 0.03865716922633, 0.08993890254447, 0.01647806948707
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03922164913945, 0.08975097370069, 0.0165205017115, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0.231309, 0.0328226
Part.ActiveView().RotateAboutCenter 0.301708, 0.185995
Part.ActiveView().RotateAboutCenter 0.160911, 0.164113
Part.ActiveView().RotateAboutCenter 0.13074, 0.196936
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0765861
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter -0.0502846, 0.0656452
Part.ActiveView().RotateAboutCenter -0.0301708, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0603416, 0.0984678
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.196936
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ViewZoomTo2 -0.052561, -0.0614914, -0.0980766, 0.00808645, -0.113087, -0.0980766
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04019903791277, 0.03762732245059, 0.02045388886332, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.05212365125021, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Vis CS M2 10-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 1, False, 0, 0, 0, 1, 1, 0.197210850835, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.AddComponent "E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", 0.04782935262654, 0.132772516695, 0.02440080915456
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.04773694214586, 0.1311260023554, 0.01912898391571, False, 0, Nothing)
Part.ViewZoomTo2 -0.00670563, -0.104531, -0.0980766, -0.00420946, -0.110448, -0.0980766
Part.ViewZoomTo2 -0.00618366, -0.106415, -0.0980766, -0.00569304, -0.107171, -0.0980766
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04687210148967, 0.1332097262487, 0.02433382806896, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.0480001, -0.0644565, -0.098145, 0.0457833, -0.125525, -0.098145
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0603416, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ViewZoomTo2 -0.00554024, -0.0899155, -0.098145, 0.00432418, -0.10121, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03099995227583, 0.03993213987724, 0.01547991248766, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 0, False, 0.08665452090562, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0804554, -0.229758
Part.ActiveView().RotateAboutCenter -0.110626, -0.295403
Part.ActiveView().RotateAboutCenter -0.0905123, -0.175054
Part.ActiveView().RotateAboutCenter -0.0804554, -0.175054
Part.ActiveView().RotateAboutCenter -0.0502846, -0.142231
Part.ActiveView().RotateAboutCenter -0.0502846, -0.087527
Part.ActiveView().RotateAboutCenter -0.0703985, -0.109409
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0603416, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0603416, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0905123, -0.12035
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ViewZoomTo2 -0.18318, 0.0161573, -0.098145, -0.115654, -0.0460925, -0.098145
Part.ViewZoomTo2 -0.173987, 0.00882772, -0.098145, -0.166967, -0.000669771, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.02855275972973, 0.1284879431203, 0.01526311176351, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0218817
Part.ActiveView().RotateAboutCenter 0.372106, 0.328226
Part.ActiveView().RotateAboutCenter 0.291651, 0.415753
Part.ActiveView().RotateAboutCenter 0.100569, 0.218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.175054
Part.ActiveView().RotateAboutCenter 0.0100569, 0.164113
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0.087527
Part.ActiveView().RotateAboutCenter 0.0201139, 0.350108
Part.ActiveView().RotateAboutCenter 0.0100569, 0.109409
Part.ViewZoomTo2 -0.0194887, -0.0547894, -0.098145, 0.0164915, -0.0907696, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03618070731196, 0.03762732245048, 0.01815393043537, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.09086062066973, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan3@Vis CS M2 10-2@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 1, False, 0, 0, 0, 1, 1, 0.1968331160344, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.AddComponent "E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", 0.09570634616672, 0.08884179560204, 0.3123386094027
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.09550627394427, 0.08737564072203, 0.3061640874011, False, 0, Nothing)
Part.ViewZoomTo2 -0.199908, -0.307215, -0.098145, -0.191997, -0.322181, -0.098145
Part.ViewZoomTo2 -0.198633, -0.313097, -0.098145, -0.197318, -0.314388, -0.098145
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.09496874216107, 0.08814183501988, 0.311915403262, False, 0, Nothing)
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.900901
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ViewZoomTo2 -0.146284, -0.288109, -0.098145, -0.131181, -0.300022, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04034083954396, 0.04182059458304, 0.2607559629901, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.0854098698291, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0603416, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0301708, -0.262581
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0402277, -0.109409
Part.ActiveView().RotateAboutCenter -0.0703985, -0.164113
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ViewZoomTo2 -0.246489, -0.230841, -0.098145, -0.211463, -0.280878, -0.098145
Part.ViewZoomTo2 -0.238104, -0.246524, -0.098145, -0.23354, -0.253992, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03842940482502, 0.08461472026389, 0.2612935609428, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.140797, 0.185995
Part.ActiveView().RotateAboutCenter 0.0703985, 0.175054
Part.ActiveView().RotateAboutCenter 0.0603416, 0.185995
Part.ActiveView().RotateAboutCenter 0.0703985, 0.196936
Part.ActiveView().RotateAboutCenter 0.0301708, 0.12035
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ViewZoomTo2 -0.191174, -0.24718, -0.098145, -0.148547, -0.305465, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04284230736857, 0.03899124490124, 0.2656827992142, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.04562347536281, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Vis CS M2 10-3@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 1, False, 0, 0, 0, 1, 1, 0.8886804291643, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.AddComponent "E:\Maquette ascenseur\Pièces\Vis CS M2 10.SLDPRT", 0.1270777916165, 0.09546109906574, 0.3291605024672
Part.ViewZoomTo2 -0.253796, -0.282757, -0.098145, -0.19964, -0.364503, -0.098145
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.1263205622283, 0.09396859896196, 0.3235733587988, False, 0, Nothing)
Part.RotateComponent
Part.ViewZoomTo2 -0.225227, -0.312717, -0.098145, -0.222109, -0.319631, -0.098145
Part.ViewZoomTo2 -0.224448, -0.315308, -0.098145, -0.224069, -0.316031, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.1267304848198, 0.09570310478239, 0.3282183739167, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.18501, -0.266816, -0.0994636, -0.161406, -0.295785, -0.0994636
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04045605147149, 0.04001042790901, 0.2704331409113, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.1130702119817, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0905123, -0.175054
Part.ActiveView().RotateAboutCenter -0.0603416, -0.109409
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, -0.109409
Part.ActiveView().RotateAboutCenter -0.0502846, -0.13129
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0765861
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0201139, -0.207877
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0603416, -0.164113
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ViewZoomTo2 -0.283075, -0.215204, -0.098145, -0.23127, -0.298093, -0.098145
Part.ViewZoomTo2 -0.271193, -0.242009, -0.098145, -0.266932, -0.250256, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0382178883828, 0.09116185869578, 0.2709992681618, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0905123, 0.0437635
Part.ActiveView().RotateAboutCenter 0.170968, 0.175054
Part.ActiveView().RotateAboutCenter 0.0905123, 0.142231
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0984678
Part.ActiveView().RotateAboutCenter 0.0201139, 0.185995
Part.ActiveView().RotateAboutCenter 0, 0.142231
Part.ActiveView().RotateAboutCenter 0, 0.109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.164113
Part.ActiveView().RotateAboutCenter 0.0301708, 0.164113
Part.ActiveView().RotateAboutCenter 0.0100569, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ViewZoomTo2 -0.217058, -0.24825, -0.098145, -0.174783, -0.287707, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04239756962465, 0.0389912449013, 0.2686431648367, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.05217061379475, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan3@Vis CS M2 10-4@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 1, False, 0, 0, 0, 1, 1, 0.3080343167549, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
' MSGBOX
' Certains des modèles référencés dans ce document ont été modifiés. Ils doivent être enregistrés lorsque le document est enregistré.
' 		Enregistrer le document et les modèles référencés maintenant ?

Part.Save2 FALSE
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0402277, -0.109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.13129
Part.ActiveView().RotateAboutCenter -0.0301708, -0.109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0301708, -0.153172
Part.ActiveView().RotateAboutCenter -0.0402277, -0.13129
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0703985, -0.109409
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ViewZoomTo2 -0.318794, -0.181073, -0.098145, -0.282706, -0.257348, -0.098145
Part.AddComponent "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 0.0570065329768, 0.01075387990437, 0.2510623634738
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0502846, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0301708, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.00170366
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.00127774
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.00127774
Part.ActiveView().TranslateBy 0, -0.000851829
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
Part.ActiveView().TranslateBy 0, -0.000425915
boolstatus = Part.Extension.SelectByID("", "FACE", 0.05786322666978, 0.0102380544333, 0.2509289328075, False, 0, Nothing)
Part.ViewZoomTo2 -0.306451, -0.215735, -0.098145, -0.305438, -0.217543, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03906518179207, 0.04850971913893, 0.2593492521564, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.03275667532104, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.13129
Part.ActiveView().RotateAboutCenter 0.0201139, 0.109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0984678
Part.ActiveView().RotateAboutCenter 0.0201139, 0.087527
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0984678
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ViewZoomTo2 -0.315001, -0.188446, -0.098145, -0.278653, -0.221765, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03884285731539, 0.009153879904432, 0.2615183802083, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.120683, -0.12035
Part.ActiveView().RotateAboutCenter -0.120683, -0.153172
Part.ActiveView().RotateAboutCenter -0.0703985, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0502846, -0.087527
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ViewZoomTo2 -0.324458, -0.15922, -0.098145, -0.306423, -0.215445, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.02662071987044, 0.04699124490099, 0.2563765082372, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.03783736499674, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Ecrou H M2-1@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 0, False, 0.2602634, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.AddComponent "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 0.03364680882152, -0.006486951493855, 0.2641177227904
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "VERTEX", 0.03164680882152, -0.005332250955476, 0.2647390899954, False, 0, Nothing)
Part.ClearSelection2 True
Part.ViewZoomTo2 -0.361516, -0.158923, -0.098145, -0.357373, -0.168359, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03400517229579, -0.007012965297747, 0.2633463909328, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.328742, -0.185424, -0.098145, -0.309273, -0.214116, -0.098145
Part.ViewZoomTo2 -0.32643, -0.195464, -0.098145, -0.321434, -0.198699, -0.098145
Part.ViewZoomTo2 -0.325082, -0.196179, -0.098145, -0.324724, -0.196484, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03847774834469, 0.04848535844957, 0.2701437356382, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.04481668698076, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.854701
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.892857
Part.ActiveView().ZoomByFactor 0.826446
Part.ActiveView().ZoomByFactor 0.833333
Part.ActiveView().ZoomByFactor 0.869565
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0502846, 0.087527
Part.ActiveView().RotateAboutCenter 0.0402277, 0.087527
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ViewZoomTo2 -0.286159, -0.205127, -0.098145, -0.277697, -0.214701, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03983216652421, -0.007565556854416, 0.2715799151767, True, 1, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.140797, -0.284463
Part.ActiveView().RotateAboutCenter -0.110626, -0.229758
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0703985, -0.13129
Part.ActiveView().RotateAboutCenter -0.0402277, -0.12035
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ViewZoomTo2 -0.350077, -0.191121, -0.098145, -0.31952, -0.215567, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.02881387723119, 0.04699124490105, 0.2746757228118, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.05455680175556, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Ecrou H M2-2@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de dessus", "PLANE", 0, 0, 0, True, 1, Nothing)
' MSGBOX
' Attention: Cette contrainte sur-contraint l'assemblage.  Considérez supprimer certaines des contraintes qui sur-contraignent l'assemblage.

Part.DeSelectByID "Plan2@Ecrou H M2-2@Maquette monte-charge", "PLANE", 0, 0, 0
boolstatus = Part.Extension.SelectByID("Plan3@Ecrou H M2-2@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
' MSGBOX
' Attention: Cette contrainte sur-contraint l'assemblage.  Considérez supprimer certaines des contraintes qui sur-contraignent l'assemblage.

Part.DeSelectByID "Plan de dessus", "PLANE", 0, 0, 0
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 1, False, 0, 0, 0, 1, 1, 0.8650115608289, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Parallèle49", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Plan2@Ecrou H M2-1@Maquette monte-charge", "PLANE", 0.03947056274848, 0.04699124490111, 0.2602634, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Part.EditMate2 3, 0, False, 0.2602634, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus
Part.ClearSelection2 True
Part.ViewZoomTo2 -0.343836, -0.14821, -0.098145, -0.307224, -0.253166, -0.098145
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.241689, 0.0583273, -0.098145, -0.155708, -0.0391874, -0.098145
Part.AddComponent "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 0.04765040341442, 0.009740778293974, 0.0472916367391
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04645956758498, 0.01136264998394, 0.04734880159469, False, 0, Nothing)
Part.ViewZoomTo2 -0.236055, 0.0125617, -0.098145, -0.232336, 0.00447588, -0.098145
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04806693361263, 0.009127640950226, 0.04651551006104, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ViewZoomTo2 -0.220718, 0.0415506, -0.098145, -0.173534, -0.00668252, -0.098145
Part.ViewZoomTo2 -0.214083, 0.031552, -0.098145, -0.208084, 0.0252329, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.02903119007067, 0.04711509284641, 0.01522233783106, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.04394681257113, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.120683, 0.142231
Part.ActiveView().RotateAboutCenter 0.0703985, 0.087527
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0984678
Part.ActiveView().RotateAboutCenter 0.0402277, 0.142231
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0.087527
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ViewZoomTo2 -0.149417, 0.0121913, -0.098145, -0.0844073, -0.0423331, -0.098145
boolstatus = Part.Extension.SelectByID("Ecrou H M2-3@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
Part.ViewZoomTo2 -0.161834, 0.0261218, -0.098145, -0.142576, 0.0058323, -0.098145
Part.SetPickMode
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03050656490342, 0.008803982192788, 0.0167657055912, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter -0.140797, -0.207877
Part.ActiveView().RotateAboutCenter -0.100569, -0.350108
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0703985, -0.12035
Part.ActiveView().RotateAboutCenter -0.0804554, -0.142231
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ViewZoomTo2 -0.233241, 0.061758, -0.098145, -0.17826, -0.0130528, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.02425065224912, 0.04562732245046, 0.01369556144081, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.03682334025781, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Ecrou H M2-3@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 0, False, 0, 0, 0, 1, 1, 0.6490946863473, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.AddComponent "E:\Maquette ascenseur\Pièces\Ecrou H M2.SLDPRT", 0.04730826887157, 0.02709870862907, 0.04132567675902
Part.ViewZoomTo2 -0.226921, 0.0261774, -0.098145, -0.208632, -0.00963847, -0.098145
Part.RotateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04643920725118, 0.02890635674532, 0.0408190138633, False, 0, Nothing)
Part.ViewZoomTo2 -0.217954, 0.0122193, -0.098145, -0.21641, 0.0100811, -0.098145
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("", "FACE", 0.04734670096281, 0.02666165716766, 0.0404268450669, False, 0, Nothing)
Part.ViewZoomTo2 -0.199056, 0.0329583, -0.098145, -0.193845, 0.0245749, -0.098145
Part.ViewZoomTo2 -0.199022, 0.0319434, -0.098145, -0.198035, 0.0309007, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03905935487512, 0.04721293174362, 0.01513075110257, True, 1, Nothing)
Set Feature = Part.AddMate2 (1, 1, False, 0.0266746911173, 0, 0, 1, 1, 0.5235987755983, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0703985, 0.087527
Part.ActiveView().RotateAboutCenter 0.150854, 0.284463
Part.ActiveView().RotateAboutCenter 0.0703985, 0.164113
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0656452
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0603416, 0.153172
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0804554, 0.12035
Part.ActiveView().RotateAboutCenter 0.0703985, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0804554, 0.087527
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ViewZoomTo2 -0.161139, 0.0323957, -0.098145, -0.0705627, -0.0592459, -0.098145
Part.ViewZoomTo2 -0.126945, 0.00276039, -0.098145, -0.105972, -0.0124372, -0.098145
boolstatus = Part.Extension.SelectByID("Ecrou H M2-4@Maquette monte-charge", "COMPONENT", 0, 0, 0, False, 0, Nothing)
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0547043
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0547043
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0656452
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0502846, 0.0765861
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0201139, 0.087527
Part.ActiveView().RotateAboutCenter 0.0100569, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
boolstatus = Part.Extension.SelectByID("", "FACE", 0.1856726775495, 0.161474021847, -0.01730134503129, False, 0, Nothing)
Part.ViewZoomTo2 -0.0899273, -0.0060069, -0.098145, -0.0815418, -0.0113681, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0391428409302, 0.02616153503277, 0.01453955435012, False, 0, Nothing)
Part.ViewZoomtofit2
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.185995
Part.ActiveView().RotateAboutCenter -0.0100569, -0.175054
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, -0.164113
Part.ActiveView().RotateAboutCenter 0, -0.164113
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, -0.175054
Part.ActiveView().RotateAboutCenter -0.0502846, -0.153172
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0301708, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0984678
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0109409
Part.ViewZoomTo2 -0.235305, 0.0093085, -0.098145, -0.201697, -0.00842917, -0.098145
boolstatus = Part.Extension.SelectByID("", "FACE", 0.03635080335005, 0.04562732245046, 0.02065594181872, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 1, False, 0.0194657874178, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan2@Ecrou H M2-4@Maquette monte-charge", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (3, 0, False, 0, 0, 0, 1, 1, 0.6508749827531, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.EditRebuild
Part.ViewZoomtofit2
Part.ShowNamedView2 "*Face", 1
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Entretoise du bâti-6@Bâti", "COMPONENT", 0, 0, 0, False, 0, Nothing)
Part.ShowComponent2
boolstatus = Part.Extension.SelectByID("Bâti-1@Maquette monte-charge/Tige filetée M3 300-1@Bâti", "COMPONENT", 0, 0, 0, False, 0, Nothing)
Part.ShowComponent2
Part.EditRebuild
Part.ClearSelection2 True
Part.Save2 FALSE
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "VERTEX", 0.1246, 0.04287550004001, 0.09626997186912, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.1241122768442, 0.03100000000001, 0.1684730600411, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.1256350840887, 0.155, 0.2400450005306, False, 0, Nothing)
Part.ClearSelection2 True
' MSGBOX
' E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM n'a pas été reconstruit avec succès depuis le dernier changement de fonction ou un modèle référencé de l'extérieur a changé.
' 	Il est plus sûr de reconstruire avant d'enregistrer.
' 		Reconstruire maintenant ?

Part.Save2 FALSE
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0301708, -0.12035
Part.ActiveView().RotateAboutCenter 0.0804554, -0.273522
Part.ActiveView().RotateAboutCenter 0.0703985, -0.207877
Part.ActiveView().RotateAboutCenter 0.0201139, -0.164113
Part.ActiveView().RotateAboutCenter 0.0100569, -0.12035
Part.ActiveView().RotateAboutCenter 0, -0.0656452
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0109409
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.100569, -0.0218817
Part.ActiveView().RotateAboutCenter -0.13074, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0905123, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0218817
Part.ActiveView().RotateAboutCenter 0, -0.0765861
Part.ActiveView().RotateAboutCenter 0.0100569, -0.0984678
Part.ActiveView().RotateAboutCenter 0.100569, -0.142231
Part.ActiveView().RotateAboutCenter 0.120683, -0.175054
Part.ActiveView().RotateAboutCenter 0.100569, -0.142231
Part.ActiveView().RotateAboutCenter 0.110626, -0.12035
Part.ActiveView().RotateAboutCenter 0.120683, -0.153172
Part.ActiveView().RotateAboutCenter 0.0804554, -0.109409
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0, -0.0437635
Part.ActiveView().RotateAboutCenter 0, -0.0328226
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0765861
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0, 0.087527
Part.ActiveView().RotateAboutCenter 0, 0.12035
Part.ActiveView().RotateAboutCenter 0, 0.13129
Part.ActiveView().RotateAboutCenter 0.0100569, 0.207877
Part.ActiveView().RotateAboutCenter 0.0201139, 0.273522
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0, 0.0109409
Part.ActiveView().RotateAboutCenter 0, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0301708, 0.13129
Part.ActiveView().RotateAboutCenter 0.0402277, 0.175054
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0804554, 0.0328226
Part.ActiveView().RotateAboutCenter 0.140797, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0.0109409
Part.ActiveView().RotateAboutCenter 0.0201139, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0100569, 0.207877
Part.ActiveView().RotateAboutCenter -0.0301708, 0.13129
Part.ActiveView().RotateAboutCenter 0, 0.0547043
Part.ActiveView().RotateAboutCenter 0, 0.0437635
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0109409
Part.ActiveView().RotateAboutCenter -0.201139, 0.0109409
Part.ActiveView().RotateAboutCenter -0.160911, 0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, 0.0984678
Part.ActiveView().RotateAboutCenter 0.201139, 0.229758
Part.ActiveView().RotateAboutCenter 0.271537, 0.229758
Part.ActiveView().RotateAboutCenter 0.110626, 0.087527
Part.ActiveView().RotateAboutCenter 0.13074, 0.109409
Part.ActiveView().RotateAboutCenter 0.0301708, 0.0328226
Part.ActiveView().RotateAboutCenter 0.0502846, 0
Part.ActiveView().RotateAboutCenter 0.0402277, 0
Part.ActiveView().RotateAboutCenter 0.0201139, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0301708, -0.0547043
Part.ActiveView().RotateAboutCenter 0, -0.273522
Part.ActiveView().RotateAboutCenter -0.0502846, -0.514221
Part.ActiveView().RotateAboutCenter -0.0201139, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0656452
Part.ActiveView().RotateAboutCenter -0.0603416, -0.0765861
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0402277, -0.0437635
Part.ActiveView().RotateAboutCenter -0.0100569, -0.0328226
Part.ActiveView().RotateAboutCenter -0.0301708, -0.087527
Part.ActiveView().RotateAboutCenter 0, -0.0109409
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.13074, 0
Part.ActiveView().RotateAboutCenter 0.0804554, 0.0218817
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0201139, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter 0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0100569, 0
Part.ActiveView().RotateAboutCenter -0.0402277, 0
Part.ActiveView().RotateAboutCenter -0.0502846, -0.0109409
Part.ActiveView().RotateAboutCenter -0.0905123, -0.0109409
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.591716
Part.ActiveView().ZoomByFactor 0.684932
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.884956
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.12
Part.ActiveView().ZoomByFactor 1.23
Part.ActiveView().ZoomByFactor 1.23
Part.ActiveView().ZoomByFactor 1.31
Part.ActiveView().ZoomByFactor 1.34
Part.ActiveView().ZoomByFactor 1.26
Part.ActiveView().ZoomByFactor 1.29
Part.ActiveView().ZoomByFactor 1.13
Part.ActiveView().ZoomByFactor 1.07
Part.ActiveView().ZoomByFactor 1.03
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.917431
Part.ActiveView().ZoomByFactor 0.714286
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.719424
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.917431
Part.ViewZoomTo2 -0.214367, 0.11293, -0.094, 0.0133944, -0.115822, -0.094
Part.ViewZoomTo2 -0.183945, 0.0704424, -0.094, -0.0720348, -0.00846382, -0.094
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID("", "FACE", 0.0864161890172, 0.1375558534624, -0.04223826208749, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "EDGE", 0.1404644712529, 0.107676506316, -0.04116832706433, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", 0.1425000000001, 0.132521557033, -0.04903922859313, False, 0, Nothing)
Part.ClearSelection2 True
Part.ViewZoomtofit2
' MSGBOX
' E:\Maquette ascenseur\Assemblages\Maquette monte-charge.SLDASM n'a pas été reconstruit avec succès depuis le dernier changement de fonction ou un modèle référencé de l'extérieur a changé.
' 	Il est plus sûr de reconstruire avant d'enregistrer.
' 		Reconstruire maintenant ?

Part.Save2 FALSE
Part.ShowNamedView2 "*Isométrique", 7
Part.ShowNamedView2 "*Trimétrique", 8
Part.ShowNamedView2 "*Dimétrique", 9
Part.Save2 FALSE
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Ecrou H M2.SLDPRT")
swApp.ExitApp
End Sub
